home *** CD-ROM | disk | FTP | other *** search
- object FrmJunk: TFrmJunk
- Left = 349
- Top = 105
- BorderIcons = [biSystemMenu]
- BorderStyle = bsSingle
- Caption = 'Junk Mail Filtering'
- ClientHeight = 400
- ClientWidth = 462
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- Scaled = False
- OnClose = FormClose
- OnCreate = FormCreate
- DesignSize = (
- 462
- 400)
- PixelsPerInch = 120
- TextHeight = 16
- object Bevel1: TBevel
- Left = 0
- Top = 354
- Width = 462
- Height = 4
- Shape = bsTopLine
- end
- object LblPass: TLabel
- Left = 76
- Top = 289
- Width = 245
- Height = 18
- Caption = 'You entered an incorrect password!'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = 18
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- Visible = False
- end
- object gb: TElGroupBox
- Left = 8
- Top = 6
- Width = 445
- Height = 83
- AutoDisableChildren = False
- BorderSides = [ebsLeft, ebsRight, ebsTop, ebsBottom]
- Caption = ' Configure Poco Mail Junk Mail filtering features '
- Flat = False
- FlatAlways = False
- ShowFocus = False
- TabOrder = 0
- object Label1: TLabel
- Left = 12
- Top = 55
- Width = 131
- Height = 16
- Caption = '&Select sensitivity level:'
- end
- object cbEnabled: TElCheckBox
- Left = 20
- Top = 26
- Width = 254
- Height = 20
- Cursor = crDefault
- Caption = '&Enable automatic Junk Mail filtering'
- TabOrder = 0
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- OnClick = cbEnabledClick
- DoubleBuffered = False
- end
- object cbSensitivity: TElAdvancedComboBox
- Left = 172
- Top = 51
- Width = 183
- Height = 24
- AutoCompletion = False
- Flat = False
- HandleDialogKeys = False
- HorizontalScroll = False
- ItemIndex = -1
- ItemHeight = 16
- Style = csDropDownList
- TabOrder = 1
- OnChange = cbSensitivityChange
- end
- end
- object pc: TElPageControl
- Left = 0
- Top = 96
- Width = 463
- Height = 257
- BorderWidth = 0
- DrawFocus = False
- Flat = False
- HotTrack = False
- Multiline = True
- RaggedRight = True
- ScrollOpposite = False
- ShowBorder = False
- Style = etsFlatTabs
- TabIndex = 0
- TabPosition = etpTop
- HotTrackFont.Charset = DEFAULT_CHARSET
- HotTrackFont.Color = clBlue
- HotTrackFont.Height = -13
- HotTrackFont.Name = 'MS Sans Serif'
- HotTrackFont.Style = []
- ActivePage = TabSheet6
- ActiveTabFont.Charset = DEFAULT_CHARSET
- ActiveTabFont.Color = clWindowText
- ActiveTabFont.Height = -13
- ActiveTabFont.Name = 'MS Sans Serif'
- ActiveTabFont.Style = []
- OnDrawTab = pcDrawTab
- ParentColor = False
- TabOrder = 1
- UseXPThemes = False
- DockOrientation = doNoOrient
- object TabSheet6: TElTabSheet
- OnShow = TabSheet6Show
- PageControl = pc
- ImageIndex = 5
- Caption = 'St&atus'
- object Label8: TLabel
- Left = 36
- Top = 187
- Width = 197
- Height = 32
- Alignment = taRightJustify
- Caption =
- 'Apply settings and test Junk Mail '#13#10'filtering on selected messag' +
- 'e(s):'
- end
- object MemoStatus: TMemo
- Left = 20
- Top = 6
- Width = 375
- Height = 146
- BorderStyle = bsNone
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentColor = True
- ParentFont = False
- ReadOnly = True
- TabOrder = 0
- end
- object BtnTest: TButton
- Left = 267
- Top = 187
- Width = 130
- Height = 33
- Caption = 'Apply and &Test'
- TabOrder = 1
- OnClick = BtnTestClick
- end
- end
- object TabSheet1: TElTabSheet
- PageControl = pc
- Caption = '&General Settings'
- Visible = False
- object Label2: TLabel
- Left = 23
- Top = 139
- Width = 112
- Height = 16
- Caption = 'Custom Sensitivity:'
- end
- object Label3: TLabel
- Left = 143
- Top = 139
- Width = 44
- Height = 16
- Caption = 'Highest'
- end
- object Label4: TLabel
- Left = 329
- Top = 139
- Width = 41
- Height = 16
- Caption = 'Lowest'
- end
- object Label7: TLabel
- Left = 23
- Top = 171
- Width = 80
- Height = 16
- Caption = 'Junk Mailbox:'
- Visible = False
- end
- object GroupBox2: TElGroupBox
- Left = 12
- Top = 8
- Width = 405
- Height = 112
- AutoDisableChildren = False
- BorderSides = [ebsLeft, ebsRight, ebsTop, ebsBottom]
- Caption = ' Run automatic junk mail filters: '
- Flat = False
- FlatAlways = False
- ParentColor = True
- ShowFocus = False
- TabOrder = 0
- object Label5: TLabel
- Left = 30
- Top = 38
- Width = 343
- Height = 16
- Caption = 'place headers to Junk mailbox, delete message from server'
- Transparent = True
- end
- object Label6: TLabel
- Left = 30
- Top = 88
- Width = 350
- Height = 16
- Caption = 'place message to Junk mailbox, delete message from server'
- Transparent = True
- end
- object cbPreFetch: TElRadioButton
- Left = 10
- Top = 18
- Width = 194
- Height = 20
- Cursor = crDefault
- Checked = True
- Caption = 'Before downloading message'
- TabOrder = 0
- DoubleBuffered = False
- end
- object cbPostFetch: TElRadioButton
- Left = 10
- Top = 68
- Width = 184
- Height = 20
- Cursor = crDefault
- Caption = 'After downloading message'
- TabOrder = 1
- DoubleBuffered = False
- end
- end
- object BarSensitivity: TTrackBar
- Left = 194
- Top = 133
- Width = 128
- Height = 28
- Max = 20
- Min = 10
- Orientation = trHorizontal
- PageSize = 1
- Frequency = 1
- Position = 10
- SelEnd = 0
- SelStart = 0
- TabOrder = 1
- TickMarks = tmBottomRight
- TickStyle = tsAuto
- OnChange = BarSensitivityChange
- end
- object cbMailbox: TElAdvancedComboBox
- Left = 140
- Top = 168
- Width = 271
- Height = 24
- AutoCompletion = False
- Flat = False
- HandleDialogKeys = False
- HorizontalScroll = False
- ItemIndex = -1
- ItemHeight = 16
- Style = csDropDownList
- TabOrder = 2
- Visible = False
- end
- end
- object TabSheet2: TElTabSheet
- PageControl = pc
- ImageIndex = 1
- Caption = '&Word Lists'
- Visible = False
- object Label9: TLabel
- Left = 16
- Top = 6
- Width = 376
- Height = 48
- Caption =
- 'Modify word lists used during filtering process. Junk Mail filte' +
- 'ring '#13#10'is not done solely based on these lists, but you can use ' +
- 'them to '#13#10'ensure certain senders are banned or always allowed th' +
- 'rough.'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = 16
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object Label10: TLabel
- Left = 144
- Top = 68
- Width = 141
- Height = 16
- Caption = 'Ban senders or domains'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = 16
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object Label11: TLabel
- Left = 144
- Top = 99
- Width = 174
- Height = 16
- Caption = 'Ban full or partial subject lines'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = 16
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object Label12: TLabel
- Left = 144
- Top = 130
- Width = 267
- Height = 16
- Caption = 'Allowed senders (not already in address book)'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = 16
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object Label13: TLabel
- Left = 144
- Top = 161
- Width = 274
- Height = 16
- Caption = 'Allowed recipients (if you use e-mail forwarding)'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = 16
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object Label14: TLabel
- Left = 144
- Top = 186
- Width = 268
- Height = 32
- Caption =
- 'For advanced users only, not used if filtering is'#13#10'done before d' +
- 'ownloading message'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = 16
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object BtnJSenders: TButton
- Left = 17
- Top = 64
- Width = 121
- Height = 24
- Caption = 'Banned Senders'
- TabOrder = 0
- OnClick = BtnJSendersClick
- end
- object BtnJSubjects: TButton
- Left = 17
- Top = 95
- Width = 121
- Height = 24
- Caption = 'Banned Subjects'
- TabOrder = 1
- OnClick = BtnJSendersClick
- end
- object BtnESenders: TButton
- Left = 17
- Top = 126
- Width = 121
- Height = 24
- Caption = 'Allowed Senders'
- TabOrder = 2
- OnClick = BtnJSendersClick
- end
- object BtnEReceivers: TButton
- Left = 17
- Top = 157
- Width = 121
- Height = 24
- Caption = 'Allowed Receivers'
- TabOrder = 3
- OnClick = BtnJSendersClick
- end
- object BtnBody: TButton
- Left = 17
- Top = 188
- Width = 121
- Height = 24
- Caption = 'Message Body'
- TabOrder = 4
- OnClick = BtnJSendersClick
- end
- end
- end
- object BtnOK: TButton
- Left = 242
- Top = 362
- Width = 100
- Height = 30
- Anchors = [akRight, akBottom]
- Caption = '&OK'
- Default = True
- TabOrder = 2
- OnClick = BtnOKClick
- end
- object BtnCancel: TButton
- Left = 351
- Top = 362
- Width = 100
- Height = 30
- Anchors = [akRight, akBottom]
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 3
- OnClick = BtnCancelClick
- end
- object PnlGrad: TElPanel
- Left = 0
- Top = 92
- Width = 463
- Height = 5
- BackgroundType = bgtVertGradient
- GradientSteps = 32
- Align = alNone
- BevelOuter = bvNone
- UseXPThemes = False
- TabOrder = 4
- DockOrientation = doNoOrient
- end
- end
-